home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC-SIG: World of Games
/
PC-SIG World of Games (CDRM1080710) (1993).iso
/
922
/
JEM2.DAT
< prev
next >
Wrap
Text File
|
1988-08-17
|
2KB
|
45 lines
!Llett= l [90] u f [80] d f [30] r [90] f [50] ; ;
!Olett= d f [30] r [90] f [50] r [90] f [30] r [90] f [50] ; ;
!Glett= f [30] r [90] f [5] u f [20] d f [25] r [90] f [30] r [90] f [50] ;
;
!logorite= Llett r [90] u f [50] Olett r [90] u f [50] d Glett r [90] u f
[50] Olett ;
!startwrite= logorite t [180] f [25] r [90] u f [15] d f [15] h ; ;
!pentagon= f [40] r [72] f [40] r [72] f [40] r [72] f [40] r [72] f [40]
r [72] ; ;
!octagon= f [40] r [45] f [40] r [45] f [40] r [45] f [40] r [45] f [40] r
[45] f [40] r [45] f [40] r [45] f [40] r [45] ; ;
!hexagon= f [40] r [60] f [40] r [60] f [40] r [60] f [40] r [60] f [40] r
[60] f [40] r [60] ; ;
!etrangle= f [40] r [120] f [40] r [120] f [40] ; ;
!retrangle= cs R etrangle l [33] ; ;
!fdecagon= f [20] r [36] f [20] r [36] f [20] r [36] f [20] r [36] f [20] r
[36] ; ;
!sdecagon= f [20] r [36] f [20] r [36] f [20] r [36] f [20] r [36] f [20] r
[36] ; ;
!decagon= fdecagon sdecagon ; ;
!rdecagon= cs R decagon r [11] ; ;
!Rdecagon= cs R decagon l [33] ; ;
!roctagon= cs R l [3] octagon ; ;
!rhexagon= cs R l [7] hexagon ; ;
!rectangle= f [40] l [90] f [20] l [90] f [40] l [90] f [20] ; ;
!shapes1= r [90] u f [90] t [0] d rectangle l [180] u f [40] d etrangle t
[0] ; ;
!shapes2= leftsqu p c rectangle p c etrangle p c ltrangle p c hexagon p c
pentagon p c octagon p c decagon ; ;
!shapes= shapes1 l [90] u f [60] t [0] d leftsqu t [0] l [90] u f [60] d t
[0] ltrangle t [0] h ; ;
!colordemo= B [9] B [0] C [0] f [10] C [1] f [10] C [2] f [10] C [3] f [10]
;;
!Fasterdemo= F pentagon T [20] Shows the Auto commands and the F command , ; ;
!Dodemo= D jem.dat F window T [20] Shows the Do command Look at Jem.run ,
; ;
!;
!rectangle= f [40] l [90] f [20] l [90] f [40] l [90] f [20] ; ;
!rectangle= f [40] l [90] f [20] l [90] f [40] l [90] f [20] ; ;
!shapes1= r [90] u f [90] t [0] d rectangle l [180] u f [40] d etrangle t
[0] ; ;
!startup= Fasterdemo Dodemo ;;
!shapes2= leftsqu p c rectangle p c etrangle p c ltrangle p c hexagon p c
pentagon p c octagon p c decagon ; ;